function kindex = markGlobalPattern(phase)

PATTERN = phase;
if strcmp(PATTERN,'LAM')
    kindex=[ 
	 1 0 0.058
	-1 0  0.058
	];
elseif strcmp(PATTERN,'12fold')
    kindex=[
        0     1     0   -1	0.058;
        0    -1     0    1	0.058;
        1     0     0    0	0.058;
       -1     0     0    0	0.058;
        0     1     0    0	0.058;
        0    -1     0    0	0.058;
        0     0     1    0	0.058;
        0     0    -1    0	0.058;
        0     0     0    1	0.058;
        0     0     0   -1	0.058;
       -1     0     1    0	0.058;
        1     0    -1    0	0.058;
        1     1     0   -1	0.058;
       -1    -1     0    1	0.058;
        1     1     0    0	0.058;
       -1    -1     0    0	0.058;
        0     1     1    0	0.058;
        0    -1    -1    0	0.058;
        0     0     1    1	0.058;
        0     0    -1   -1	0.058;
       -1     0     1    1	0.058;
        1     0    -1   -1	0.058;
       -1    -1     1    1	0.058;
        1     1    -1   -1	0.058
        ];
elseif strcmp(PATTERN, '10fold')
	kindex=[      
				1	  0     0    0	0.058;
				0	  1     0    0	0.058;
				0	  0     1    0	0.058;
				0	  0     0    1	0.058;
				-1	  1    -1    1	0.058;
				-1	  0     0    0	0.058;
				0	 -1     0    0	0.058;
				0	  0    -1    0	0.058;
				0	  0     0   -1	0.058;
				1	 -1     1   -1	0.058;
				1	  0     1   -1	0.058;
				1	  0     1    0	0.058;
				0	  1     0    1	0.058;
				-1	  1     0    1	0.058;
				-1	  0     0    1	0.058;
				-1	  0    -1    1	0.058;
				-1	  0    -1    0	0.058;
				0	 -1     0   -1	0.058;
				1	 -1     0   -1	0.058;
				1	  0     0   -1	0.058
			];
elseif strcmp(PATTERN,'CAM12fold')
    kindex=[
        30     0	0.058;
        26    15	0.058;
        15    26	0.058;
        0     30	0.058;
       -15    26	0.058;
       -26    15	0.058;
       -30     0	0.058;
       -26   -15	0.058;
       -15   -26	0.058;
        0    -30	0.058;
        15   -26	0.058;
        26   -15	0.058;
        56    15	0.058;
        41    41	0.058;
        15    56	0.058;
       -15    56	0.058;
       -41    41	0.058;
       -56    15	0.058;
       -56   -15	0.058;
       -41   -41	0.058;
       -15   -56	0.058;
        15   -56	0.058;
        41   -41	0.058;
        56   -15	0.058
        ];
elseif strcmp(PATTERN,'cam6fold')
    kindex=[
        30     0	0.3;
        15    26	0.3;
       -15    26	0.3;
       -30     0	0.3;
       -15   -26	0.3;
        15   -26	0.3
        ];
elseif strcmp(PATTERN, 'bcc')
    kindex=[
        1	 1	 0	0.3;
       -1	 1	 0	0.3;
       -1	-1	 0	0.3;
        1	-1	 0	0.3;
        0	 1	 1	0.3;
        0	-1	 1	0.3;
        0	-1	-1	0.3;
        0	 1	-1	0.3;
        1	 0	 1	0.3;
       -1	 0	 1	0.3;
       -1	 0	-1	0.3;
        1	 0	-1	0.3
        ];
elseif strcmp(PATTERN, 'fcc')
    kindex=[
        1	 1	 1	0.3;
        1	-1	 1	0.3;
       -1	 1	 1	0.3;
       -1	-1	 1	0.3;
        ];
elseif strcmp(PATTERN, 'A15')
    kindex=[
	   -2, -1, 0 	0.0338277052131978 ;
		2,  1, 0 	0.0338277052131978 ;
		2, -1, 0 	0.0338277052131977 ;
	   -2,  1, 0 	0.0338277052131977 ;
	   -1,  2, 0   -0.0338277052131977 ;
		1, -2, 0   -0.0338277052131977 ;
		1,  2, 0   -0.0338277052131977 ;
	   -1, -2, 0   -0.0338277052131977 ;
		0, -2, 1 	0.0338228603092057 ;
	   -2,  0, 1   -0.0338228603092056 ;
		0,  2, 1 	0.0338228603092055 ;
		2,  0, 1   -0.0338228603092055 ;
	   -1,  0, 2 	0.0338139694707322 ;
		0, -1, 2   -0.0338139694707320 ;
		0,  1, 2   -0.0338139694707319 ;
		1,  0, 2 	0.0338139694707319 ;
		0,  0, 2 	0.0331853928814813 ;
		0,  2, 0 	0.0331847214985317 ;
		2,  0, 0 	0.0331847214985317 ;
		0, -2, 0 	0.0331847214985317 ;
	   -2,  0, 0 	0.0331847214985317 ;
		1, -1, 2 	0.0297069055330425 ;
	   -1, -1, 2 	0.0297069055330425 ;
		1,  1, 2 	0.0297069055330424 ;
	   -1,  1, 2 	0.0297069055330424 ;
	   -1,  2, 1 	0.0297065456817734 ;
	   -2, -1, 1 	0.0297065456817733 ;
	   -1, -2, 1 	0.0297065456817733 ;
		2, -1, 1 	0.0297065456817733 ;
	   -2,  1, 1 	0.0297065456817732 ;
		2,  1, 1 	0.0297065456817732 ;
		1,  2, 1 	0.0297065456817732 ;
		1, -2, 1 	0.0297065456817731 
        ];
elseif strcmp(PATTERN, 'gyroid')
    kindex=[
			 1	-2	1	 7.433127e-02;
			-2	 1	1	 7.433126e-02;
			-1	-1	2	 7.433125e-02;
			 1	 2	1	-7.433124e-02;
			 1	 1	2	-7.433123e-02;
			 2	 1	1	-7.433122e-02;
			-2	-1	1	-7.433121e-02;
			 1	-1	2	-7.433120e-02;
			-1	 1	2	 7.433120e-02;
			-1	 2	1	-7.433119e-02;
			-1	-2	1	 7.433119e-02;
			 2	-1	1	 7.433119e-02	
        ];
elseif strcmp(PATTERN,'6fold')
	kindex=[
			0     1    -1	0.3 
			0    -1     1	0.3 
			1     0    -1	0.3 
			1    -1     0	0.3 
		   -1     0     1	0.3 
		   -1     1     0	0.3 
	];
elseif strcmp(PATTERN,'hex')
	kindex=[
			1     0     0.3 
		   -1     0     0.3 
			0     1     0.3 
		    0    -1     0.3 
		    1    -1     0.3 
		   -1     1     0.3 
	];
elseif strcmp(PATTERN,'fddd')
	kindex=[
			1     1     1  -0.3; 
			1     1    -1	0.3; 
			1    -1     1	0.3; 
		    1    -1    -1	0.3;
			0     2     2  -0.3;
			0     2    -2   0.3;
			0     0     4	0.3 
	];
elseif strcmp(PATTERN,'fdddCube')
	kindex=[
			2	-1	 1   0.06;  
			1	-1	 2  -0.06;  
		   -1	 1	-2  -0.06;  
		   -2	 1	-1   0.06;  
		    2	 1	 1  -0.06;  
		    1	 1	 2  -0.06;  
		   -1	-1	-2  -0.06;  
		   -2	-1	-1  -0.06;  
		   -1	 2	 1  -0.03;  
		   -1	-2	 1   0.03;  
		    1	 2	-1   0.03;  
		    1	-2	-1  -0.03;  
		   -2	 0	 2   0.02;  
		    2	 0	-2   0.02;  
		    0	 1	 3  -0.005;  
		    0	-1	 3   0.005;  
		    0	 1	-3   0.005;  
		    0	-1	-3  -0.005;  
		    3	 1	 0  -0.005;  
		   -3	 1	 0  -0.005;  
		    3	-1	 0  -0.005;  
		   -3	-1	 0  -0.005
	];
elseif strcmp(PATTERN,'icosahedron')
	tmp = [
			1	0	0	0	0	0; 
			0	1	0	0	0	0; 
			0	0	1	0	0	0; 
			0	0	0	1	0	0; 
			0	0	0	0	1	0; 
			0	0	0	0	0	1; 
			0	0	1	0	1	0;
			0	1	0	0  -1	0;
			0	1  -1	1  -1	1;
			1  -1   1  -1   1  -1;
			1	0	0  -1	0	0; 
		   -1	1	0   1	0	1; 
		   -1	1	0   1	0	0; 
			0	0   1  -1	0  -1; 
			0	0   1  -1	0   0
			]; 
	kindex = [tmp; -1.0*tmp];
	tmpq = [
		   -1	1	1	0	0	0;
			0	0	0	1	0	1;
			0	1  -1	1  -1	0;
			1	0	0  -1	0  -1;
			1  -1	1  -1	1	0;
			0	0	1  -1	1	0;
			0	0   1  -1	1  -1;
		   -1   1	0	1  -1	0;
		   -1	1	0	1  -1	1;
			1	0  -1	0	0	0;
			1  -1	0	0	1	0;
			1  -1	0	0	0	0;
			1	0  -1	0  -1	0;
		   -1	1  -1	2  -1	1;
			0	1  -1	0  -1	0
			];
	kindex = [kindex; tmpq; -1.0*tmpq];
	val = 0.03*ones(kindex(length(:,1)), 1);
	kindex = [kindex, val];
elseif strcmp(PATTERN,'2fold')
	kindex=[
			1, 0, 0, 0.01; 
	];
end

end
